clear
use "/home/scott/Dropbox/Florence_Paper/replication/data/sort2.dta"

tset time

tabulate scrutiny, g(scrt)
tabulate quarter, g(qrt)
tabulate gondf, g(gdf)

drop(gdf4)
drop(scrt1)


reg pub_debt scrt* qrt* gdf*, vce(robust), if year > 1393
test(scrt2 scrt3 scrt4 scrt5 scrt6)

reg debt scrt* qrt* gdf*, vce(robust), if year > 1393
test(scrt2 scrt3 scrt4 scrt5 scrt6)

reg private scrt* qrt*, vce(robust), if year > 1393
test(scrt2 scrt3 scrt4 scrt5 scrt6)

reg real_estate scrt* qrt* gdf*, vce(robust), if year > 1393
test(scrt2 scrt3 scrt4 scrt5 scrt6)


reg total scrt* qrt*, vce(robust), if year > 1393
test(scrt2 scrt3 scrt4 scrt5 scrt6)


gen lndebt = log(debt+1)

gen lnpdebt = log(pub_debt+1)

gen lnreal = log(real_estate+1)

gen lnprivate =log(private+1)

gen lntotal =log(total+1)



reg lnpdebt scrt* qrt* gdf*, vce(robust), if year > 1393
test(scrt2 scrt3 scrt4 scrt5 scrt6)

reg lndebt scrt* qrt* gdf*, vce(robust), if year > 1393
test(scrt2 scrt3 scrt4 scrt5 scrt6)

reg lnprivate scrt* qrt*, vce(robust), if year > 1393
test(scrt2 scrt3 scrt4 scrt5 scrt6)

reg lnreal scrt* qrt* gdf*, vce(robust), if year > 1393
test(scrt2 scrt3 scrt4 scrt5 scrt6)


reg lntotal scrt* qrt*, vce(robust), if year > 1393
test(scrt2 scrt3 scrt4 scrt5 scrt6)


